home *** CD-ROM | disk | FTP | other *** search
/ Holt Researcher: American History / Holt Researcher: American History.iso / pc / modules / search.dxr / 00090_titles list score script.ls < prev    next >
Encoding:
Text File  |  2000-01-18  |  648 b   |  21 lines
  1. on mouseUp
  2.   global gSearchObj
  3.   clickedLine = the mouseLine
  4.   kListSprite = 4
  5.   xMember = the member of sprite kListSprite
  6.   title = string(line clickedLine of field xMember)
  7.   TitleChar1to2 = char 1 to 2 of title
  8.   if (clickedLine > 0) and (stripPunct(title) <> EMPTY) and (TitleChar1to2 <> "‚Äî ") then
  9.     scrollbarObj = getScrollbarObj(gSearchObj)
  10.     oldSelection = getSelection(scrollbarObj)
  11.     setSelection(scrollbarObj, clickedLine)
  12.     if the doubleClick or (clickedLine = oldSelection) then
  13.       cursor(4)
  14.       tell the stage
  15.         findAndOpenMediaWindow(clickedLine, #title)
  16.       end tell
  17.       cursor(-1)
  18.     end if
  19.   end if
  20. end
  21.